home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD BIT 75
/
CD BIT 75.iso
/
Software
/
LogOut
/
disk1
/
_SETUP.1
/
GCondom7.exe
/
0
/
RCDATA
/
TFRMFICHEIROCLIENTES
/
TFRMFICHEIROCLIENTES.txt
< prev
Wrap
Text File
|
2004-10-21
|
27KB
|
890 lines
object frmFicheiroClientes: TfrmFicheiroClientes
Left = 202
Top = 165
BorderStyle = bsNone
Caption = 'frmFicheiroClientes'
ClientHeight = 485
ClientWidth = 752
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 752
Height = 485
Align = alClient
BevelOuter = bvNone
BorderStyle = bsSingle
TabOrder = 0
object Image1: TImage
Left = 0
Top = 0
Width = 748
Height = 481
Align = alClient
Picture.Data = {<image000.bmp>}
Stretch = True
end
object Label1: TLabel
Left = 8
Top = 8
Width = 329
Height = 29
Caption = 'Ficheiro de Clientes (AEPS)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -24
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label13: TLabel
Left = 45
Top = 34
Width = 665
Height = 52
Alignment = taCenter
AutoSize = False
Caption =
'Nesta fase da exporta��o do ficheiro de clientes que se pretende' +
' colocar a pagamento na rede Multibanco dever� seleccionar os co' +
'ndom�nios pretendidos. A fim de facilitar a selec��o exite a pos' +
'sibilidade de ordenar, filtrar e pesquisar os condom�nios.'#13#10'A se' +
'lec��o poder� ser feita premindo a tecla SHIFT simultaneamente c' +
'om as teclas de cursor ou com a tecla CTRL ao mesmo tempo que se' +
' clica com o bot�o esquerdo do rato nos condom�nios desejados. D' +
'epois de seleccionados fa�a �Seguinte�'
Transparent = True
WordWrap = True
end
object RxSpeedButton1: TRxSpeedButton
Left = 650
Top = 450
Width = 75
Height = 25
Caption = 'Seguinte >>'
Flat = True
Layout = blGlyphLeft
NumGlyphs = 2
Transparent = True
OnClick = RxSpeedButton1Click
end
object RxSpeedButton2: TRxSpeedButton
Left = 550
Top = 450
Width = 75
Height = 25
Caption = 'Cancelar'
Flat = True
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
Layout = blGlyphLeft
NumGlyphs = 2
Transparent = True
OnClick = RxSpeedButton2Click
end
object RxSpeedButton3: TRxSpeedButton
Left = 450
Top = 450
Width = 75
Height = 25
DropDownMenu = RxPopupMenu1
Caption = 'Imprimir'
Enabled = False
Flat = True
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
1800000000000003000000000000000000000000000000000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF000000404040000000FFFFFFFFFFFF000000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00000040404050505040
4040000000303030C0C0C0303030FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFF000000404040909090A0A0A0606060404040808080606060C0C0C03030
30FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000505050909090A0A0A0A0A0A080
8080606060404040808080B0B0B0909090303030FFFFFFFFFFFFFFFFFFFFFFFF
000000909090A0A0A0CFCFCFCFCFCF808080808080606060606060404040B0B0
B0303030FFFFFFFFFFFFFFFFFFFFFFFF606060A0A0A0CFCFCFCFCFCFC0C0C0CF
CFCF808080808080606060606060202020FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
606060CFCFCFCFCFCFC0C0C0C0C0C0C0C0C0CFCFCF8080808080806060600000
00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6F6F6FCFCFCFC0C0C0A06060C0C0C0C0
C0C0C0C0C0CFCFCF808080808080606060000000FFFFFFFFFFFFFFFFFFFFFFFF
3F3F3FCFCFCFA06060C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0CFCFCF8080808080
80000000FFFFFFFFFFFFFFFFFF3030306F6F6F7F7F7FCFCFCFC0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0CFCFCF808080000000FFFFFFFFFFFF0000006F6F6F
FFFFFFFFBFBF7F7F7FCFCFCFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0AFAF
AF000000FFFFFFFFFFFF3F3F3FFFFFFFFFBFBFFFBFBFFFBFBF7F7F7FCFCFCFC0
C0C0C0C0C0C0C0C0C0C0C0B0B0B0202020FFFFFFFFFFFFFFFFFF000000BFBFBF
FFBFBFFFBFBFFFBFBFFFBFBF7F7F7FCFCFCFC0C0C0C0C0C0B0B0B0202020FFFF
FFFFFFFFFFFFFFFFFFFFFFFFFF000000BFBFBFFFBFBFFFBFBFFFFFFF6F6F6F3F
3F3FCFCFCFB0B0B0202020FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
000000BFBFBFFFFFFF6F6F6F303030FFFFFF3F3F3F202020FFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000003F3F3F000000FFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
Layout = blGlyphLeft
Transparent = True
end
object Label20: TLabel
Left = 10
Top = 96
Width = 56
Height = 13
Caption = 'Dt. Proc.:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label22: TLabel
Left = 178
Top = 96
Width = 89
Height = 13
Caption = 'Dt. In�cio Pag.:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label23: TLabel
Left = 380
Top = 96
Width = 89
Height = 13
Caption = 'Dt. Limite Pag.:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Panel3: TPanel
Left = 2
Top = 116
Width = 743
Height = 330
BevelInner = bvLowered
Color = clWhite
TabOrder = 1
Visible = False
object Label2: TLabel
Left = 80
Top = 16
Width = 42
Height = 13
Caption = 'Header'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 80
Top = 140
Width = 45
Height = 13
Caption = 'Detalhe'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 80
Top = 290
Width = 37
Height = 13
Caption = 'Trailer'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object RxDBGrid2: TRxDBGrid
Left = 150
Top = 5
Width = 400
Height = 40
Color = clWhite
DataSource = dsHeader
FixedColor = 13551795
Options = [dgEditing, dgTitles, dgColumnResize, dgRowLines, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'A001'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A002'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A003'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A004'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A005'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A007'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A033'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A006'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Filler'
Title.Alignment = taCenter
Visible = True
end>
end
object RxDBGrid3: TRxDBGrid
Left = 150
Top = 48
Width = 400
Height = 229
Color = clWhite
DataSource = dsDetalhe
FixedColor = 13551795
Options = [dgEditing, dgTitles, dgColumnResize, dgRowLines, dgConfirmDelete, dgCancelOnExit]
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'A001'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A009'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A034'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A044'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A011'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A018'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A019'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Filler'
Title.Alignment = taCenter
Visible = True
end>
end
object RxDBGrid4: TRxDBGrid
Left = 150
Top = 280
Width = 400
Height = 40
Color = clWhite
DataSource = dsTrailer
FixedColor = 13551795
Options = [dgEditing, dgTitles, dgColumnResize, dgRowLines, dgConfirmDelete, dgCancelOnExit]
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'A001'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'A024'
Title.Alignment = taCenter
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Filler'
Title.Alignment = taCenter
Visible = True
end>
end
end
object Panel2: TPanel
Left = 2
Top = 116
Width = 743
Height = 330
BevelInner = bvLowered
Color = clWhite
TabOrder = 0
object Label61: TLabel
Left = 10
Top = 13
Width = 70
Height = 13
Caption = 'Ordenados por'
end
object Label62: TLabel
Left = 212
Top = 13
Width = 58
Height = 13
Caption = 'Procurar por'
end
object Label5: TLabel
Left = 566
Top = 13
Width = 19
Height = 13
Caption = 'Ano'
end
object RxLabel1: TRxLabel
Left = 381
Top = 304
Width = 200
Height = 17
Alignment = taRightJustify
Caption = '0 Condom�nios Seleccionados'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object RxLabel2: TRxLabel
Left = 615
Top = 304
Width = 100
Height = 17
Alignment = taRightJustify
Caption = '0 Condom�nios'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 10
Top = 300
Width = 120
Height = 26
Caption = 'Seleccionar Todos'
Flat = True
Glyph.Data = {
BE060000424DBE06000000000000360400002800000024000000120000000100
0800000000008802000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
0303030303030303030303030303030303030303030303030303030303030303
03030303030303030303030303030303030303030303FF030303030303030303
03030303030303040403030303030303030303030303030303F8F8FF03030303
03030303030303030303040202040303030303030303030303030303F80303F8
FF030303030303030303030303040202020204030303030303030303030303F8
03030303F8FF0303030303030303030304020202020202040303030303030303
0303F8030303030303F8FF030303030303030304020202FA0202020204030303
0303030303F8FF0303F8FF030303F8FF03030303030303020202FA03FA020202
040303030303030303F8FF03F803F8FF0303F8FF03030303030303FA02FA0303
03FA0202020403030303030303F8FFF8030303F8FF0303F8FF03030303030303
FA0303030303FA0202020403030303030303F80303030303F8FF0303F8FF0303
0303030303030303030303FA0202020403030303030303030303030303F8FF03
03F8FF03030303030303030303030303FA020202040303030303030303030303
0303F8FF0303F8FF03030303030303030303030303FA02020204030303030303
03030303030303F8FF0303F8FF03030303030303030303030303FA0202020403
030303030303030303030303F8FF0303F8FF03030303030303030303030303FA
0202040303030303030303030303030303F8FF03F8FF03030303030303030303
03030303FA0202030303030303030303030303030303F8FFF803030303030303
030303030303030303FA0303030303030303030303030303030303F803030303
0303030303030303030303030303030303030303030303030303030303030303
0303}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object ComboBox4: TComboBox
Left = 85
Top = 9
Width = 110
Height = 21
Hint = 'Muda a ordena��o da lista'
Style = csDropDownList
Color = clInfoBk
ItemHeight = 13
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnChange = ComboBox4Change
Items.Strings = (
'Condom�nio'
'Pessoa Colectiva'
'Contribuinte'
'Ano')
end
object Edit4: TEdit
Left = 277
Top = 9
Width = 250
Height = 21
Hint = 'Texto a procurar, dependendo da ordena��o'
Color = clInfoBk
Ctl3D = True
ParentCtl3D = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnChange = Edit4Change
end
object Edit1: TEdit
Left = 590
Top = 9
Width = 50
Height = 21
Hint = 'Texto a procurar, dependendo da ordena��o'
TabStop = False
Color = clInfoBk
Ctl3D = True
ParentCtl3D = False
ParentShowHint = False
ReadOnly = True
ShowHint = True
TabOrder = 2
Text = '2003'
OnChange = Edit1Change
end
object UpDown1: TUpDown
Left = 640
Top = 9
Width = 16
Height = 21
Associate = Edit1
Min = 1990
Max = 2020
Position = 2003
TabOrder = 3
Thousands = False
Wrap = False
end
object CheckBox1: TCheckBox
Left = 666
Top = 11
Width = 49
Height = 17
Caption = 'Todos'
TabOrder = 4
OnClick = CheckBox1Click
end
object RxDBGrid1: TRxDBGrid
Left = 8
Top = 40
Width = 713
Height = 257
Color = clWhite
Ctl3D = True
DataSource = dsCondominios
FixedColor = 13551795
Options = [dgTitles, dgRowLines, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
ParentCtl3D = False
TabOrder = 5
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = RxDBGrid1CellClick
OnKeyUp = RxDBGrid1KeyUp
MultiSelect = True
Columns = <
item
Expanded = False
FieldName = 'Condom�nio'
Width = 240
Visible = True
end
item
Expanded = False
FieldName = 'Pessoa Colectiva'
Width = 260
Visible = True
end
item
Expanded = False
FieldName = 'Contr.'
Title.Caption = 'Contribuinte'
Width = 89
Visible = True
end
item
Expanded = False
FieldName = 'Ano'
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'ID'
Title.Caption = 'C�d.'
Width = 35
Visible = True
end>
end
end
object DateEdit1: TDateEdit
Left = 67
Top = 93
Width = 110
Height = 21
NumGlyphs = 2
TabOrder = 2
end
object DateEdit2: TDateEdit
Left = 269
Top = 93
Width = 110
Height = 21
NumGlyphs = 2
TabOrder = 3
end
object DateEdit3: TDateEdit
Left = 471
Top = 93
Width = 110
Height = 21
NumGlyphs = 2
TabOrder = 4
end
object CheckBox11: TCheckBox
Left = 584
Top = 96
Width = 130
Height = 17
Caption = 'V�lidas datas dos docs'
Color = clWhite
ParentColor = False
TabOrder = 5
OnClick = CheckBox11Click
end
end
object tCondominios: TTable
Left = 370
Top = 10
object tCondominiosID: TAutoIncField
FieldName = 'ID'
ReadOnly = True
end
object tCondominiosCondomnio: TStringField
FieldName = 'Condom�nio'
Size = 50
end
object tCondominiosPessoaColectiva: TStringField
FieldName = 'Pessoa Colectiva'
Size = 80
end
object tCondominiosContr: TStringField
FieldName = 'Contr.'
Size = 12
end
object tCondominiosAno: TSmallintField
FieldName = 'Ano'
end
object tCondominiosMoeda: TStringField
FieldName = 'Moeda'
Size = 10
end
object tCondominiosDados: TStringField
FieldName = 'Dados'
Size = 50
end
object tCondominiosTipoQuota: TStringField
FieldName = 'Tipo Quota'
Size = 10
end
object tCondominiosDescrio: TStringField
FieldName = 'Descri��o'
Size = 80
end
object tCondominiosAnoFim: TSmallintField
FieldName = 'Ano Fim'
end
end
object dsCondominios: TDataSource
DataSet = tCondominios
Left = 402
Top = 10
end
object MemHeader: TMemoryTable
Left = 482
Top = 10
object MemHeaderA001: TStringField
FieldName = 'A001'
Size = 1
end
object MemHeaderA002: TStringField
FieldName = 'A002'
Size = 4
end
object MemHeaderA003: TStringField
FieldName = 'A003'
Size = 8
end
object MemHeaderA004: TStringField
FieldName = 'A004'
Size = 8
end
object MemHeaderA005: TStringField
FieldName = 'A005'
Size = 9
end
object MemHeaderA007: TStringField
FieldName = 'A007'
Size = 9
end
object MemHeaderA033: TStringField
FieldName = 'A033'
Size = 5
end
object MemHeaderA006: TStringField
FieldName = 'A006'
Size = 3
end
object MemHeaderFiller: TStringField
FieldName = 'Filler'
Size = 3
end
end
object MemDetalhe: TMemoryTable
Left = 548
Top = 6
object MemDetalheA001: TStringField
FieldName = 'A001'
Size = 1
end
object MemDetalheA009: TStringField
FieldName = 'A009'
Size = 2
end
object MemDetalheA034: TStringField
FieldName = 'A034'
Size = 9
end
object MemDetalheA044: TStringField
FieldName = 'A044'
Size = 8
end
object MemDetalheA011: TStringField
FieldName = 'A011'
Size = 10
end
object MemDetalheA018: TStringField
FieldName = 'A018'
Size = 8
end
object MemDetalheA019: TStringField
FieldName = 'A019'
Size = 10
end
object MemDetalheFiller: TStringField
FieldName = 'Filler'
Size = 2
end
end
object MemTrailer: TMemoryTable
Left = 612
Top = 6
object MemTrailerA001: TStringField
FieldName = 'A001'
Size = 1
end
object MemTrailerA024: TStringField
FieldName = 'A024'
Size = 8
end
object MemTrailerFiller: TStringField
FieldName = 'Filler'
Size = 41
end
end
object dsHeader: TDataSource
DataSet = MemHeader
Left = 516
Top = 6
end
object dsDetalhe: TDataSource
DataSet = MemDetalhe
Left = 580
Top = 6
end
object dsTrailer: TDataSource
DataSet = MemTrailer
Left = 644
Top = 6
end
object SaveDialog1: TSaveDialog
Left = 682
Top = 10
end
object RxPopupMenu1: TRxPopupMenu
Left = 712
Top = 8
object FicheiroImportado1: TMenuItem
Caption = 'Ficheiro a Exportar'
OnClick = FicheiroImportado1Click
end
object FicheiroAnalisado1: TMenuItem
Caption = 'Ficheiro Analisado'
OnClick = FicheiroAnalisado1Click
end
end
end